Шаг 65 - Объект File.

Обеспечивает доступ ко всем свойствам файла.

Пример
Следующий код иллюстрирует, как получить объект File и как просмотреть одно из свойств.

Sub ShowFileInfo(filespec)
    Dim fs, f, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFile(filespec)
    s = f.DateCreated
    MsgBox s
End Sub

Свойства
Attributes
DateCreated
DateLastAccessed
DateLastModified
Drive
Name
ParentFolder
Path
ShortName
ShortPath
Size
Type

Методы
Copy
Delete
Move
OpenAsTextStream

Hosted by uCoz